function AnalyseCharacteristicsEditors()

ValueFolder='/sps/isc/rneveu/EtudeIRM/Nature/Results/';
ValueFolderTemp='/sps/isc/rneveu/EtudeIRM/Nature/ResultsJournal/';
ValueFolderTemp2='/sps/isc/rneveu/EtudeIRM/Nature/ResultsEditor/';
ValueFolder2='/sps/isc/rneveu/EtudeIRM/Nature/';
load([ValueFolder2 'DonneesNature.mat']);
load([ValueFolder2 'EtudeNature.mat']);
VecEditors1Temp(1,:)=[];
VecResults=[];
for n2=1:323
    ValueTemp=dir([ValueFolderTemp2 'FileAnalysisCharacteristicsEditor' num2str(n2) '.mat']);
    if n2~=125&&size(ValueTemp,1)==0
    n2
    n5=1;
    ValueTemp=VecEditors1Temp{n2,11};
    while n5<=size(VecJournalTemp,1)&&strcmpi(ValueTemp,VecJournalTemp{n5,1})==0
        n5=n5+1;
    end
    Value39=n5;
    load([ValueFolderTemp2 'StartEditor' num2str(n2) '.mat']);
    if size(ValueMaxDate1,1)>1&&size(ValueMaxDate2,1)>1
        ValueFile=dir([ValueFolderTemp2 'ResultsCharacteristicsEditor' num2str(n2) '.mat']);
        if size(ValueFile,1)==1
            VecResultsTemp=[];
            VecResultsFilteredTemp=[];
            load([ValueFolderTemp2 'ResultsCharacteristicsEditor' num2str(n2) '.mat']);
            if exist('VecResultsOriginal')>0
                if size(VecResultsOriginal,1)==0
                    VecResultsOriginal=zeros(1,9);
                end
                if size(VecResultsReview,1)==0
                    VecResultsReview=zeros(1,9);
                end
                if size(VecResultsTotal,1)==0
                    VecResultsTotal=zeros(1,9);
                end
                if size(VecGroupCoAuthors,1)==0
                    VecGroupCoAuthors={0};
                end
                if size(VecCoAuthorsBefore,1)==0
                    VecCoAuthorsBefore=NaN;
                end
                ValueTemp=find(VecResultsOriginal(:,2)==1&VecResultsOriginal(:,1)==1);
                Value1=size(ValueTemp,1);
                ValueTemp=find(VecResultsOriginal(:,5)==1&VecResultsOriginal(:,1)==1);
                Value2=size(ValueTemp,1);
                Value19=Value1+Value2;
                ValueTemp=find(VecResultsReview(:,2)==1&VecResultsReview(:,1)==1);
                Value20=size(ValueTemp,1);
                ValueTemp=find(VecResultsReview(:,5)==1&VecResultsReview(:,1)==1);
                Value21=size(ValueTemp,1);
                Value22=Value19+Value20;
                ValueTemp=find(VecResultsOriginal(:,2)==1&VecResultsOriginal(:,9)==1&VecResultsOriginal(:,1)==1);
                Value3=size(ValueTemp,1);
                ValueTemp=find(VecResultsOriginal(:,5)==1&VecResultsOriginal(:,9)==1&VecResultsOriginal(:,1)==1);
                Value4=size(ValueTemp,1);
                Value23=Value3+Value4;
                ValueTemp=find(VecResultsReview(:,2)==1&VecResultsReview(:,9)==1&VecResultsReview(:,1)==1);
                Value24=size(ValueTemp,1);
                ValueTemp=find(VecResultsReview(:,5)==1&VecResultsReview(:,9)==1&VecResultsReview(:,1)==1);
                Value25=size(ValueTemp,1);
                Value26=Value24+Value25;
                ValueTemp=find(VecResultsOriginal(:,1)==1);
                Value5=mean(VecCoAuthorsBefore(ValueTemp,1)+1);
                ValueTemp=find(VecResultsOriginal(:,1)==1&VecResultsOriginal(:,9)==1);
                Value6=mean(VecCoAuthorsBefore(ValueTemp,1)+1);
                ValueTemp=find(VecResultsOriginal(:,2)==1);
                ValueTemp2=find(VecResultsTotal(:,1)==1);
                Value7=size(ValueTemp,1)/size(ValueTemp2,1)*100;
                ValueTemp=find(VecResultsOriginal(:,5)==1);
                ValueTemp2=find(VecResultsTotal(:,1)==1);
                Value8=size(ValueTemp,1)/size(ValueTemp2,1)*100;
                ValueTemp=find(VecResultsOriginal(:,2)==1&VecResultsOriginal(:,9)==1);
                ValueTemp2=find(VecResultsTotal(:,1)==1&VecResultsTotal(:,9)==1);
                Value9=size(ValueTemp,1)/size(ValueTemp2,1)*100;
                ValueTemp=find(VecResultsOriginal(:,5)==1&VecResultsOriginal(:,9)==1);
                ValueTemp2=find(VecResultsTotal(:,1)==1&VecResultsTotal(:,9)==1);
                Value10=size(ValueTemp,1)/size(ValueTemp2,1)*100;
                ValueTemp=VecEditors1Temp{n2,18};
                ValueTemp2=VecEditors1Temp{n2,19};
                ValueTemp3=VecEditors1Temp{n2,20};
                if ischar(ValueTemp3)==0&&ischar(ValueTemp2)==0
                    Value11=ValueTemp3-ValueTemp2;
                    if ValueTemp3~=ValueTemp2
                        ValueStartEditor=datenum(['01-01-' num2str(ValueTemp2)],'dd-mmm-yyyy');
                        ValueEndEditor=datenum(['31-12-' num2str(ValueTemp3)],'dd-mmm-yyyy');
                        ValueTemp4=find(VecResultsOriginal(:,1)==1&VecResultsOriginal(:,7)>=ValueStartEditor&VecResultsOriginal(:,7)<=ValueEndEditor);
                        Value14=size(ValueTemp4,1);
                        Value29=Value14/(Value11+1);
                        ValueTemp4=find(VecResultsReview(:,1)==1&VecResultsReview(:,7)>=ValueStartEditor&VecResultsReview(:,7)<=ValueEndEditor);
                        Value31=size(ValueTemp4,1);
                        Value33=Value31/(Value11+1);
                    else
                        Value14=0;
                        Value29=0;
                        Value31=0;
                        Value33=0;
                    end
                else
                    Value11=NaN;
                    Value14=NaN;
                    Value29=NaN;
                    Value31=NaN;
                    Value33=NaN;
                end
                if ischar(ValueTemp)==0&&ischar(ValueTemp2)==0
                    Value12=ValueTemp2-ValueTemp;
                    ValueStartEditor=datenum(['01-01-' num2str(ValueTemp)],'dd-mmm-yyyy');
                    ValueEndEditor=datenum(['31-12-' num2str(ValueTemp2)],'dd-mmm-yyyy');
                    ValueTemp4=find(VecResultsOriginal(:,1)==1&VecResultsOriginal(:,7)>=ValueStartEditor&VecResultsOriginal(:,7)<=ValueEndEditor);
                    Value13=size(ValueTemp4,1);
                    Value28=Value13/(Value12+1);
                    ValueTemp4=find(VecResultsReview(:,1)==1&VecResultsReview(:,7)>=ValueStartEditor&VecResultsReview(:,7)<=ValueEndEditor);
                    Value30=size(ValueTemp4,1);
                    Value32=Value30/(Value12+1);
                else
                    Value12=NaN;
                    Value13=NaN;
                    Value28=NaN;
                    Value30=NaN;
                    Value32=NaN;
                end
                if ischar(ValueTemp3)==0&&ischar(ValueTemp)==0
                    Value27=ValueTemp3-ValueTemp;
                    ValueStartEditor=datenum(['01-01-' num2str(ValueTemp)],'dd-mmm-yyyy');
                    ValueEndEditor=datenum(['31-12-' num2str(ValueTemp3)],'dd-mmm-yyyy');
                    ValueTemp4=find(VecResultsOriginal(:,1)==1&VecResultsOriginal(:,7)>=ValueStartEditor&VecResultsOriginal(:,7)<=ValueEndEditor);
                    Value35=size(ValueTemp4,1);
                    Value36=Value35/(Value27+1);
                    ValueTemp4=find(VecResultsReview(:,1)==1&VecResultsReview(:,7)>=ValueStartEditor&VecResultsReview(:,7)<=ValueEndEditor);
                    Value37=size(ValueTemp4,1);
                    Value38=Value37/(Value27+1);
                else
                    Value27=NaN;
                    Value35=NaN;
                    Value36=NaN;
                    Value37=NaN;
                    Value38=NaN;
                end
                ValueTemp=VecEditors1Temp{n2,4};
                ValueTemp2=VecEditors1Temp{n2,6};
                ValueTemp3=VecEditors1Temp{n2,23};
                if size(ValueTemp,1)>0&&size(ValueTemp2,1)>0&&ischar(ValueTemp)==0&&ischar(ValueTemp2)==0&&isnan(ValueTemp)==0&&isnan(ValueTemp2)==0
                    if ValueTemp2<ValueTemp
                        n6=5;
                    else
                        n6=3;
                    end
                else
                    if size(ValueTemp,1)>0&&ischar(ValueTemp)==0&&isnan(ValueTemp)==0
                        n6=3;
                    else
                        if size(ValueTemp2,1)>0&&ischar(ValueTemp2)==0&&isnan(ValueTemp2)==0
                            n6=5;
                        else
                            n6=-1;
                        end
                    end
                end
                if size(ValueTemp3,1)>0&&ischar(ValueTemp3)==0&&isnan(ValueTemp3)==0
                    n7=22;
                else
                    n7=-1;
                end
                if n6>-1
                    ValueDateTemp2=VecEditors1Temp{n2,n6};
                    ValueTemp=find(ValueDateTemp2=='/');
                    ValueMonthEditor=ValueDateTemp2(1,ValueTemp(1,1)+1:ValueTemp(1,2)-1);
                    ValueYearEditor=ValueDateTemp2(1,ValueTemp(1,2)+1:end);
                    ValueDateEditor=datenum(['01-' ValueMonthEditor '-' ValueYearEditor],'dd-mmm-yyyy');
                    ValueDateReference=datenum('01-12-2020','dd-mmm-yyyy');
                    Value15=(ValueDateReference-ValueDateEditor)/365.25;
                else
                    Value15=NaN;
                end
                if n7>-1
                    ValueDateTemp2=VecEditors1Temp{n2,n7};
                    ValueTemp=find(ValueDateTemp2=='/');
                    ValueMonthEditor=ValueDateTemp2(1,ValueTemp(1,1)+1:ValueTemp(1,2)-1);
                    ValueYearEditor=ValueDateTemp2(1,ValueTemp(1,2)+1:end);
                    ValueDateEditor=datenum(['01-' ValueMonthEditor '-' ValueYearEditor],'dd-mmm-yyyy');
                    ValueDateReference=datenum('01-12-2020','dd-mmm-yyyy');
                    Value16=(ValueDateReference-ValueDateEditor)/365.25;
                else
                    if n6>-1
                        Value16=Value15;
                    else
                        Value16=NaN;
                    end
                end
                ValueTemp=VecEditors1Temp{n2,22};
                if size(ValueTemp,1)>0&&ischar(ValueTemp)==0&&isnan(ValueTemp)==0
                    Value17=1;
                else
                    Value17=0;
                end
                ValueTemp=0;
                for n4=1:size(VecGroupCoAuthors,1)
                    ValueTemp=ValueTemp+VecGroupCoAuthors{n4,1};
                end
                ValueTemp2=find(VecResultsTotal(:,1)==1);
                if size(ValueTemp2,1)>0
                    Value18=ValueTemp/size(ValueTemp2,1);
                else
                    Value18=NaN;
                end
                if size(VecGroupCoAuthors,1)>0
                    ValueTemp2=find(VecResultsTotal(:,1)==1&VecResultsTotal(:,9)==1);
                    if size(ValueTemp2,1)>0
                        Value34=VecGroupCoAuthors{1,1}/size(ValueTemp2,1);
                    else
                        Value34=NaN;
                    end
                else
                    Value34=0;
                end
                ValueTemp=VecEditors1Temp{n2,11};
                ValueTemp='VecResultsEditor=[';
                for n4=1:39
                    ValueTemp=[ValueTemp ' Value' num2str(n4)];
                end
                ValueTemp=[ValueTemp '];'];
                eval(ValueTemp);
            else
                ValueTemp=VecEditors1Temp{n2,18};
                ValueTemp2=VecEditors1Temp{n2,19};
                ValueTemp3=VecEditors1Temp{n2,20};
                if ischar(ValueTemp3)==0&&ischar(ValueTemp2)==0
                    Value11=ValueTemp3-ValueTemp2;
                else
                    Value11=NaN;
                end
                if ischar(ValueTemp)==0&&ischar(ValueTemp2)==0
                    Value12=ValueTemp2-ValueTemp;
                else
                    Value12=NaN;
                end
                if ischar(ValueTemp3)==0&&ischar(ValueTemp)==0
                    Value27=ValueTemp3-ValueTemp;
                else
                    Value27=NaN;
                end
                ValueTemp=VecEditors1Temp{n2,4};
                ValueTemp2=VecEditors1Temp{n2,6};
                ValueTemp3=VecEditors1Temp{n2,23};
                if size(ValueTemp,1)>0&&size(ValueTemp2,1)>0&&ischar(ValueTemp)==0&&ischar(ValueTemp2)==0&&isnan(ValueTemp)==0&&isnan(ValueTemp2)==0
                    if ValueTemp2<ValueTemp
                        n6=5;
                    else
                        n6=3;
                    end
                else
                    if size(ValueTemp,1)>0&&ischar(ValueTemp)==0&&isnan(ValueTemp)==0
                        n6=3;
                    else
                        if size(ValueTemp2,1)>0&&ischar(ValueTemp2)==0&&isnan(ValueTemp2)==0
                            n6=5;
                        else
                            n6=-1;
                        end
                    end
                end
                if size(ValueTemp3,1)>0&&ischar(ValueTemp3)==0&&isnan(ValueTemp3)==0
                    n7=22;
                else
                    n7=-1;
                end
                if n6>-1
                    ValueDateTemp2=VecEditors1Temp{n2,n6};
                    ValueTemp=find(ValueDateTemp2=='/');
                    ValueMonthEditor=ValueDateTemp2(1,ValueTemp(1,1)+1:ValueTemp(1,2)-1);
                    ValueYearEditor=ValueDateTemp2(1,ValueTemp(1,2)+1:end);
                    ValueDateEditor=datenum(['01-' ValueMonthEditor '-' ValueYearEditor],'dd-mmm-yyyy');
                    ValueDateReference=datenum('01-12-2020','dd-mmm-yyyy');
                    Value15=(ValueDateReference-ValueDateEditor)/365.25;
                else
                    Value15=NaN;
                end
                if n7>-1
                    ValueDateTemp2=VecEditors1Temp{n2,n7};
                    ValueTemp=find(ValueDateTemp2=='/');
                    ValueMonthEditor=ValueDateTemp2(1,ValueTemp(1,1)+1:ValueTemp(1,2)-1);
                    ValueYearEditor=ValueDateTemp2(1,ValueTemp(1,2)+1:end);
                    ValueDateEditor=datenum(['01-' ValueMonthEditor '-' ValueYearEditor],'dd-mmm-yyyy');
                    ValueDateReference=datenum('01-12-2020','dd-mmm-yyyy');
                    Value16=(ValueDateReference-ValueDateEditor)/365.25;
                else
                    if n6>-1
                        Value16=Value15;
                    else
                        Value16=NaN;
                    end
                end
                ValueTemp=VecEditors1Temp{n2,22};
                if size(ValueTemp,1)>0&&ischar(ValueTemp)==0&&isnan(ValueTemp)==0
                    Value17=1;
                else
                    Value17=0;
                end
                VecResultsEditor=[NaN(1,10) Value11 Value12 NaN(1,2) Value15 Value16 Value17 NaN(1,9) Value27 NaN(1,11) Value39];
            end
        end
    else
        VecResultsEditor=[NaN(1,38) Value39];
    end
    save([ValueFolderTemp2 'FileAnalysisCharacteristicsEditor' num2str(n2) '.mat'],'VecResultsEditor');
    end
end